home *** CD-ROM | disk | FTP | other *** search
Unknown | 1994-02-05 | 981 b |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
66%
| dexvert
| GW-BASIC (document/gwBasic)
| ext
| Supported |
66%
| dexvert
| GFA-BASIC Atari (other/gfaBASICAtari)
| ext
| Supported |
1%
| dexvert
| Memotech MTX BASIC source (document/memotechMTXBASICSource)
| ext
| Unsupported |
1%
| dexvert
| Amiga BASIC Protected File (other/amigaBASICProtectedFile)
| ext
| Unsupported |
1%
| dexvert
| BAS VBDOS Pro 1.0 Source (other/basVBDOSPro10Source)
| ext
| Unsupported |
1%
| dexvert
| Visual Basic Tokenized Source (other/visualBasicTokenizedSource)
| ext
| Unsupported |
1%
| dexvert
| ZBASIC (other/zbasic)
| ext
| Unsupported |
100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| d1 03 00 00 0d 0a 27 20 | 46 61 64 65 2e 0d 0a 0d |......' |Fade....|
|00000010| 0a 27 20 49 6e 70 75 74 | 3a 09 34 2d 38 2d 32 34 |.' Input|:.4-8-24|
|00000020| 20 62 69 74 0d 0a 27 20 | 4f 75 74 70 75 74 3a 09 | bit..' |Output:.|
|00000030| 32 34 20 62 69 74 0d 0a | 0d 0a 27 20 41 75 74 68 |24 bit..|..' Auth|
|00000040| 6f 72 3a 09 41 6e 64 72 | 65 61 20 42 65 6e 6f 6e |or:.Andr|ea Benon|
|00000050| 69 09 09 09 20 72 65 76 | 3a 09 31 2e 31 0d 0a 0d |i... rev|:.1.1...|
|00000060| 0a 0d 0a 73 74 72 69 6e | 67 20 20 20 20 09 69 6e |...strin|g .in|
|00000070| 70 46 69 6c 65 2c 6f 75 | 74 46 69 6c 65 0d 0a 44 |pFile,ou|tFile..D|
|00000080| 65 76 43 6f 6e 09 49 62 | 6d 70 2c 4f 62 6d 70 0d |evCon.Ib|mp,Obmp.|
|00000090| 0a 52 47 42 09 70 69 78 | 0d 0a 66 6c 6f 61 74 20 |.RGB.pix|..float |
|000000a0| 20 09 78 2c 79 2c 4c 2c | 4d 0d 0a 0d 0a 69 6e 70 | .x,y,L,|M....inp|
|000000b0| 46 69 6c 65 3d 22 54 65 | 73 74 69 2e 62 6d 70 22 |File="Te|sti.bmp"|
|000000c0| 09 09 09 09 27 20 69 6e | 70 75 74 20 66 69 6c 65 |....' in|put file|
|000000d0| 0d 0a 6f 75 74 46 69 6c | 65 3d 22 54 65 73 74 6f |..outFil|e="Testo|
|000000e0| 2e 62 6d 70 22 09 09 09 | 09 27 20 6f 75 74 70 75 |.bmp"...|.' outpu|
|000000f0| 74 20 66 69 6c 65 0d 0a | 0d 0a 49 62 6d 70 3d 4c |t file..|..Ibmp=L|
|00000100| 6f 61 64 49 6d 61 67 65 | 28 69 6e 70 46 69 6c 65 |oadImage|(inpFile|
|00000110| 29 0d 0a 4f 62 6d 70 3d | 43 72 65 61 74 65 49 6d |)..Obmp=|CreateIm|
|00000120| 61 67 65 28 49 62 6d 70 | 2e 57 69 64 74 68 2c 49 |age(Ibmp|.Width,I|
|00000130| 62 6d 70 2e 48 65 69 67 | 68 74 2a 2e 38 35 2c 32 |bmp.Heig|ht*.85,2|
|00000140| 34 29 09 27 49 62 6d 70 | 2e 42 69 74 43 6f 75 6e |4).'Ibmp|.BitCoun|
|00000150| 74 29 0d 0a 0d 0a 69 66 | 28 28 49 62 6d 70 2e 42 |t)....if|((Ibmp.B|
|00000160| 69 74 43 6f 75 6e 74 3d | 38 29 09 7c 28 49 62 6d |itCount=|8).|(Ibm|
|00000170| 70 2e 42 69 74 43 6f 75 | 6e 74 3d 34 29 29 0d 0a |p.BitCou|nt=4))..|
|00000180| 20 20 46 6f 72 20 79 3d | 30 20 74 6f 20 32 35 35 | For y=|0 to 255|
|00000190| 0d 0a 20 20 20 20 20 70 | 69 78 3d 47 65 74 50 61 |.. p|ix=GetPa|
|000001a0| 6c 65 74 74 65 28 49 62 | 6d 70 2c 79 29 0d 0a 20 |lette(Ib|mp,y).. |
|000001b0| 20 20 20 20 53 65 74 50 | 61 6c 65 74 74 65 28 4f | SetP|alette(O|
|000001c0| 62 6d 70 2c 79 2c 70 69 | 78 29 0d 0a 20 20 4e 65 |bmp,y,pi|x).. Ne|
|000001d0| 78 74 20 79 0d 0a 45 6e | 64 69 66 0d 0a 0d 0a 46 |xt y..En|dif....F|
|000001e0| 6f 72 20 79 3d 30 20 74 | 6f 20 4f 62 6d 70 2e 48 |or y=0 t|o Obmp.H|
|000001f0| 65 69 67 68 74 2d 31 0d | 0a 20 20 20 44 73 70 57 |eight-1.|. DspW|
|00000200| 68 69 6c 65 28 22 43 6f | 6e 76 65 72 73 69 6f 6e |hile("Co|nversion|
|00000210| 65 22 2c 31 30 30 2f 49 | 62 6d 70 2e 48 65 69 67 |e",100/I|bmp.Heig|
|00000220| 68 74 2a 79 29 09 09 27 | 20 64 69 73 70 6c 61 79 |ht*y)..'| display|
|00000230| 20 63 75 72 73 6f 72 65 | 0d 0a 20 20 20 4c 3d 31 | cursore|.. L=1|
|00000240| 2d 28 2e 37 2f 4f 62 6d | 70 2e 48 65 69 67 68 74 |-(.7/Obm|p.Height|
|00000250| 2a 79 29 0d 0a 20 20 20 | 4d 3d 31 2d 28 2e 32 2f |*y).. |M=1-(.2/|
|00000260| 4f 62 6d 70 2e 48 65 69 | 67 68 74 2a 79 29 0d 0a |Obmp.Hei|ght*y)..|
|00000270| 20 20 20 46 6f 72 20 78 | 3d 30 20 74 6f 20 49 62 | For x|=0 to Ib|
|00000280| 6d 70 2e 57 69 64 74 68 | 0d 0a 20 20 20 20 20 20 |mp.Width|.. |
|00000290| 70 69 78 3d 47 65 74 50 | 69 78 65 6c 28 49 62 6d |pix=GetP|ixel(Ibm|
|000002a0| 70 2c 78 2c 79 29 09 09 | 0d 0a 20 20 20 20 20 20 |p,x,y)..|.. |
|000002b0| 70 69 78 2e 52 65 64 3d | 70 69 78 2e 52 65 64 2a |pix.Red=|pix.Red*|
|000002c0| 4d 0d 0a 20 20 20 20 20 | 20 70 69 78 2e 47 72 65 |M.. | pix.Gre|
|000002d0| 65 6e 3d 70 69 78 2e 47 | 72 65 65 6e 2a 4c 0d 0a |en=pix.G|reen*L..|
|000002e0| 20 20 20 20 20 20 70 69 | 78 2e 42 6c 75 65 3d 70 | pi|x.Blue=p|
|000002f0| 69 78 2e 42 6c 75 65 2a | 4c 0d 0a 20 20 20 20 20 |ix.Blue*|L.. |
|00000300| 20 53 65 74 50 69 78 65 | 6c 28 4f 62 6d 70 2c 78 | SetPixe|l(Obmp,x|
|00000310| 2c 79 2c 70 69 78 29 0d | 0a 20 20 20 4e 65 78 74 |,y,pix).|. Next|
|00000320| 20 78 0d 0a 4e 65 78 74 | 20 79 0d 0a 50 72 65 76 | x..Next| y..Prev|
|00000330| 69 65 77 28 49 62 6d 70 | 2c 69 6e 70 46 69 6c 65 |iew(Ibmp|,inpFile|
|00000340| 2c 35 2c 35 2c 49 62 6d | 70 2e 57 69 64 74 68 2b |,5,5,Ibm|p.Width+|
|00000350| 36 2c 49 62 6d 70 2e 48 | 65 69 67 68 74 2b 32 30 |6,Ibmp.H|eight+20|
|00000360| 29 0d 0a 50 72 65 76 69 | 65 77 28 4f 62 6d 70 2c |)..Previ|ew(Obmp,|
|00000370| 6f 75 74 46 69 6c 65 2c | 33 32 30 2c 35 2c 4f 62 |outFile,|320,5,Ob|
|00000380| 6d 70 2e 57 69 64 74 68 | 2b 36 2c 4f 62 6d 70 2e |mp.Width|+6,Obmp.|
|00000390| 48 65 69 67 68 74 2b 32 | 30 29 0d 0a 0d 0a 53 61 |Height+2|0)....Sa|
|000003a0| 76 65 49 6d 61 67 65 28 | 4f 62 6d 70 2c 6f 75 74 |veImage(|Obmp,out|
|000003b0| 46 69 6c 65 29 0d 0a 44 | 73 70 57 68 69 6c 65 28 |File)..D|spWhile(|
|000003c0| 22 22 2c 30 29 0d 0a 44 | 73 70 4d 65 73 28 22 46 |"",0)..D|spMes("F|
|000003d0| 69 6e 65 22 29 | |ine") | |
+--------+-------------------------+-------------------------+--------+--------+